home *** CD-ROM | disk | FTP | other *** search
/ Aminet 16 / Aminet 16 (1996)(GTI - Schatztruhe)[!][Dec 1996].iso / Aminet / dev / lang / uc_0_30.lha / u / tca / tc0099.ua < prev   
Text File  |  1996-10-30  |  312b  |  26 lines
  1. `**********************
  2. `* P R O J E C T  < U >
  3. `*
  4. `* Author and copyright
  5. `* (c) 1996
  6. `* Paul van der Valk
  7. `*
  8. `* file: tc0006.ua
  9. `*
  10. `* Tests the plus operator.
  11.  
  12. `#1 .H 2 0 0 0
  13. `#2 .M "tc0006" 20 0 0 0
  14.  
  15. `#20 >22 .c 1 21
  16. `#21 .s "(100 + 1) = "
  17.  
  18. `#22 >30 .c 4 23
  19. #23 @pl 24 25
  20. `#24 .n 100
  21. `#25 .n 1
  22.  
  23. `#30 .c 3 0
  24.  
  25.  
  26.